<!--#include file="base.asp"-->
<!--#include file="incFile.asp"-->
<%
	Dim objXMLHTTP, objXML
	Dim strXML, strURL

	Set objXMLHTTP = Server.CreateObject("Msxml2.SERVERXMLHTTP.4.0")

	strURL = base & "/t_server/contact_us.asp?c_id="&strCompaniesId&"&scid="&strCompaniesId&"&slid="&strLoginsId&"&no_menu=1&source_xml"
	
	objXMLHTTP.Open "GET", strURL, False
'Response.Write(CStr(strURL) & "<BR>")
'Response.Write("<a href=""" & strURL & """>View XML</a><br>")
	Call objXMLHTTP.Send("")
	Set objXML = objXMLHTTP.ResponseXML
	Call XMLToHTMLOutput(objXML, "xsl/contact_us.xsl")
	
	Set objXMLHTTP = Nothing
	Set objXML = Nothing
%>
